home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •Word Games• / HyperJotto 1.1 •••• / HyperJotto 1.1 ееее / card_2861.txt < prev    next >
Text File  |  1988-02-01  |  4KB  |  191 lines
  1. -- card: 2861 from stack: in.1 –µ–µ–µ–µ
  2. -- bmap block id: 15566
  3. -- flags: 4000
  4. -- background id: 2756
  5. -- name: Jotto Home
  6. ----- HyperTalk script -----
  7. On OpenCard
  8.   Global Donnit
  9.   put empty into card field "Guess" of card "Player"
  10.   if Donnit is false then send mouseUp to button "Shareware"
  11.   put true into Donnit
  12. End OpenCard
  13.  
  14.  
  15. -- part 1 (button)
  16. -- low flags: 00
  17. -- high flags: 0000
  18. -- rect: left=384 top=111 right=165 bottom=445
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 20965 / 20965
  21. -- text alignment: 1
  22. -- font id: 0
  23. -- text size: 12
  24. -- style flags: 0
  25. -- line height: 16
  26. -- part name: ShareWare
  27. ----- HyperTalk script -----
  28. on mouseUp
  29.   go to card id 4066
  30. end mouseUp
  31.  
  32.  
  33.  
  34.  
  35. -- part 2 (button)
  36. -- low flags: 00
  37. -- high flags: 0000
  38. -- rect: left=46 top=111 right=166 bottom=108
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 14767 / 14767
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: Help
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   go to card id 4577
  50. end mouseUp
  51.  
  52.  
  53.  
  54.  
  55. -- part 3 (button)
  56. -- low flags: 00
  57. -- high flags: 8003
  58. -- rect: left=61 top=231 right=300 bottom=133
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 530 / 530
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: Beginner
  67. ----- HyperTalk script -----
  68. on mouseUp
  69.   global Level
  70.   set the cursor to 4
  71.   put 1 into Level
  72.   send mouseUp to card btn "Playit"
  73. end mouseUp
  74.  
  75.  
  76.  
  77.  
  78.  
  79. -- part 5 (button)
  80. -- low flags: 00
  81. -- high flags: 8003
  82. -- rect: left=161 top=231 right=300 bottom=233
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 530 / 530
  85. -- text alignment: 1
  86. -- font id: 0
  87. -- text size: 12
  88. -- style flags: 0
  89. -- line height: 16
  90. -- part name: Advanced
  91. ----- HyperTalk script -----
  92. on mouseUp
  93.   global Level
  94.   set the cursor to 4
  95.   put 2 into Level
  96.   send mouseUp to card btn "Playit"
  97.  
  98. end mouseUp
  99.  
  100.  
  101.  
  102. -- part 6 (button)
  103. -- low flags: 00
  104. -- high flags: 8003
  105. -- rect: left=263 top=231 right=300 bottom=335
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 530 / 530
  108. -- text alignment: 1
  109. -- font id: 0
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: Wordsmith
  114. ----- HyperTalk script -----
  115. on mouseUp
  116.   global Level
  117.   set the cursor to 4
  118.   put 3 into Level
  119.   send mouseUp to card btn "Playit"
  120.  
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 7 (button)
  126. -- low flags: 00
  127. -- high flags: 8003
  128. -- rect: left=364 top=231 right=300 bottom=436
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 530 / 530
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: Master
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   global Level
  140.   set the cursor to 4
  141.   put 4 into Level
  142.   send mouseUp to card btn "Playit"
  143.  
  144. end mouseUp
  145.  
  146.  
  147.  
  148. -- part 9 (button)
  149. -- low flags: 80
  150. -- high flags: 8003
  151. -- rect: left=206 top=140 right=162 bottom=306
  152. -- title width / last selected line: 0
  153. -- icon id / first selected line: 0 / 0
  154. -- text alignment: 1
  155. -- font id: 0
  156. -- text size: 12
  157. -- style flags: 0
  158. -- line height: 16
  159. -- part name: Playit
  160. ----- HyperTalk script -----
  161. on mouseUp
  162.   set the lockscreen to true
  163.   picktarget
  164.   go to card "Player"
  165.   put empty into card field "Results"
  166.   if the visible of card btn "Hide" is true then
  167.     send mouseUp to card btn "Hide"
  168.   end if
  169.   set the lockscreen to false
  170. end mouseUp
  171.  
  172.  
  173.  
  174. -- part 10 (button)
  175. -- low flags: 00
  176. -- high flags: 0000
  177. -- rect: left=189 top=42 right=90 bottom=289
  178. -- title width / last selected line: 0
  179. -- icon id / first selected line: 1011 / 1011
  180. -- text alignment: 1
  181. -- font id: 0
  182. -- text size: 12
  183. -- style flags: 0
  184. -- line height: 16
  185. -- part name: Go Home
  186. ----- HyperTalk script -----
  187. on mouseUp
  188.   Go Home
  189. end mouseUp
  190.  
  191.